(Fself_insert_and_exit): Fix mixing of Lisp_Object and

int.

diff --git a/src/minibuf.c b/src/minibuf.c
index 124d8eb8cc7f8f2a18b914f6d385cd803f3a7f6e..91230e6f732d8d6168f5783511ae065b6f707562 100644 (file)
--- a/src/minibuf.c
+++ b/src/minibuf.c
@@ -1913,7 +1913,7 @@ DEFUN ("self-insert-and-exit", Fself_insert_and_exit, Sself_insert_and_exit, 0,
   ()
 {
   if (INTEGERP (last_command_char))
-    internal_self_insert (last_command_char, 0);
+    internal_self_insert (XINT (last_command_char), 0);
   else
     bitch_at_user ();